約 2,208,472 件
https://w.atwiki.jp/sampleisbest/pages/124.html
開発環境 Microsoft Visual C++ 2010 Express (SP1) 実行環境 Microsoft Windows XP Home Edition (SP3) プロジェクトの種類 空の CLR プロジェクト プロジェクト名 clrmdx 参考 C++/CLI 、わずか８行で Man-DirectXへ移行せよ！ clrmdx.cpp /* プロジェクトへの参照の追加(参照タブ) C \WINDOWS\Microsoft.NET\DirectX for Managed Code\1.0.2902.0 Microsoft.DirectX.Direct3D.dll */ #pragma comment(linker, "/subsystem windows") #pragma comment(linker, "/entry main") #using System.dll #using System.Windows.Forms.dll #using System.Drawing.dll #include "Form1.h" using namespace ClrMdx; [STAThreadAttribute] int main(array System String ^ ^args) { // コントロールが作成される前に、Windows XP ビジュアル効果を有効にします Application EnableVisualStyles(); Application SetCompatibleTextRenderingDefault(false); // メイン ウィンドウを作成して、実行します Application Run(gcnew Form1()); return 0; } Form1.h #pragma once namespace ClrMdx { using namespace System; using namespace System Windows Forms; using namespace System Drawing; using namespace Microsoft DirectX Direct3D; public ref class Form1 public Form { public Form1(void) { InitializeComponent(); PresentParameters^ pp = gcnew PresentParameters(); pp- Windowed = true; pp- SwapEffect = SwapEffect Discard;// ダブルバッファを有効に device = gcnew Device(0, DeviceType Hardware, this, CreateFlags HardwareVertexProcessing, pp); } protected ~Form1() { if (components) { delete components; } } private System ComponentModel Container ^components; Device^ device; void InitializeComponent(void) { SuspendLayout(); AutoScaleDimensions = SizeF(6, 12); AutoScaleMode = Windows Forms AutoScaleMode Font; ClientSize = Drawing Size(292, 273); Name = L"Form1"; Text = L"Form1"; Paint += gcnew PaintEventHandler(this, Form1 Form1_Paint); ResumeLayout(false); } Void Form1_Paint(Object^ sender, PaintEventArgs^ e) { device- Clear(ClearFlags Target, Color DarkCyan, 1.0f, 0); device- Present();// バッファをスワップ } }; }
https://w.atwiki.jp/chenaoki/pages/15.html
開発環境 Trouble Shooting メモffopencvの問題点 vaio内蔵のwebcameraを使ったビューアを作ろうとするも misc 開発環境 OpenCV ver1.1 VisualStudio 2008 WindowsVista Trouble Shooting メモ ffopencvの問題点 OPMappingのoffline解析用プログラムをOpenCVで実装しようかと画策。 OPMAP- NORMALIZED- DIFFERENCE- SIMPLE PHASE- PSPOINT と次々に動画を作成しては読み込むようなプログラムにしようかと思っていたら AVIの読み込みでつまづく。問題はCvWriterによる動画作成にあるらしい。 （解説→とあーる研究weblog, やほーグループ） 要は、 OpenCV/bin/ffopencv110.dll がきちんと実装されてない（cvReleaseVideoWriteなどの関数がない)らしい。なんじゃそりゃ。 前者の解説をもとに、ffopencv.dllをやほーのと置換するも、 cvcap_w32.cppの CvCapture_FFMPEG_proxy open( const char* filename) の実行時にaccess violationってエラーが出て失敗。よーわからん。 結局bmpファイルではいちゃった方が早い気がする。 ってかOpenCV使う意味ナイキがする。 vaio内蔵のwebcameraを使ったビューアを作ろうとするも capture = cvCreateCameraCapture( 0 ); でキャプチャして (IplImage*)frameImage = cvQueryFrame( capture ); cvShowImage(frameImage); とやると、カメラは起動するし、ウィンドウも立ち上がるがなぜか画像が表示されない。なぜ。。 → version1.0にはvideoInput.dll的なのが含まれていなかったっぽい。ver1.1にしたら解決 misc カメラ毎の画像サイズ camera width height Logitech v-us20 352 288 vaio 内蔵 640 480
https://w.atwiki.jp/lookworld/pages/28.html
まずは、ＤＬＬ用のプロジェクトを新規に作成します。 １．プロジェクトの作成 １－１．新規作成－プロジェクトを選択する。 １－２．MFC AppWizard(dll)を選択する。 １－３．プロジェクト名を入力する。 １－４．位置を入力する。 ２．ＳＴＥＰ１ ２－１．作成するＤＬＬの種類：MFCの共有DLLを使用 ２－２．オートメーション：チェック無し ２－３．Windowsソケット：チェック有り ２－４．ソースファイルのコメント生成：する これで、ＤＬＬのひな型が自動生成されます。 後は、プロジェクトに関数をどんどん追加していけばＯＫです。 ただし、注意点が何点かあります。 （サンプル：ZZsocksend_VC.cpp） ////////////////////////////////////////////////////////////////////////////////// // // ファイルヘッダ // // プロジェクト名 // // プロセス 共通関数ライブラリ（ＤＬＬ） // // ファイル概要 // @(s) // ソケット送信処理 // // 履 歴 // @(h) ZZsocsend_VC.cpp ver 0.0 ( 99.04.15 ) // 新規作成 // ////////////////////////////////////////////////////////////////////////////////// // インクルード定義 #include "stdafx.h" #include "zz_com.h" #include "nhk_def.h" // 各端末共通 デファイン定義 #include "nhk_imsg.h" // 各端末共通メッセージ構造体定義 // デファイン定義 // 外部参照定義 // ソケット切断処理 ////////////////////////////////////////////////////////////////////////////////// // // 関数ヘッダ // // 機能 ソケット送信処理 // // 返り値 正常 RC_NORMAL // 異常 RC_ERROR // // 機能説明 電文をソケットに送信する。 // 異常終了時にソケットを削除する。 // // 備考 この関数が呼ばれる前に、ソケットの初期化が完了していること。 // ＶＣ＋＋タスクよりコールされる。 // // ////////////////////////////////////////////////////////////////////////////////// { // 内部参照定義 long rsts; // 関数戻り値 rsts = send(soc,send_buf,send_len,0); // 送信 if(rsts == SOCKET_ERROR) // エラー { rsts = WSAGetLastError( ); // エラー番号取得 return RC_ERROR; // 異常終了 } return RC_NORMAL; // 正常終了 } 必要なヘッダファイルをインクルードします。 ZZsocclose_VC()関数をDLL内の関数から呼び出す時に宣言します。これは、一括してヘッダファイルに定義しても構わないと思います。 関数名の宣言はサンプルのように記述します。関数名はZZsocsend_VC()です。 拡張子がdefのファイルに、追加した関数宣言を記述します。 （サンプル：zz_com.def） ; zz_com.def DLL 用のモジュール パラメータ宣言 LIBRARY "zz_com" DESCRIPTION zz_com Windows Dynamic Link Library EXPORTS ; 明示的なエクスポートはここへ記述できます ZZsocopen_VC @1 ZZsocclose_VC @2 @の後ろの数字は順番に割り当てて下さい。 後はビルドすればＯＫです。 ＤＬＬが完成したら、それを使用してみましょう。 （サンプル：SVEVdllinit.cpp） ////////////////////////////////////////////////////////////////////////////////// // // ファイルヘッダ // // プロジェクト名 システム // // プロセス サーバイベント管理プロセス // // ファイル概要 // @(s) // ＤＬＬ初期化処理 // // 履 歴 // @(h) SVEVdllinit.cpp ver 0.0 ( 00.06.08 ) // 新規作成 // ////////////////////////////////////////////////////////////////////////////////// #include "stdafx.h" #include "SVEVcom.h" // デファイン定義 // 外部参照定義 ////////////////////////////////////////////////////////////////////////////////// // // 関数ヘッダ // // 機能 ＤＬＬ初期化処理 // // 返り値 正常 TRUE // 異常 FALSE // // 機能説明 ＤＬＬ化された関数を使用可能にする。 // // 備考 // ////////////////////////////////////////////////////////////////////////////////// bool SVEVdllinit( void ) { char DllPathName[255]; // ＤＬＬパス int Ret; // 関数戻り値 // デバッグ文出力 TRACE("%s[%d] 開始\n",__file__,__line__); //----------------------------------------------------------------------------- /// ＤＬＬとのリンクを確立 //----------------------------------------------------------------------------- // DLLファイルパスの取得 // ＤＬＬのパス名を取得する if( Ret != RC_NORMAL ) // パス名称取得エラーか { // デバッグ文出力 TRACE("%s[%d] DLLファイルパス名取得失敗\n",__file__,__line__); sprintf( DllPathName[0], "DLLファイルパス名の取得に失敗しました。\nレジストリキー(%s)を確認してください。", REGKEY_DLLPATH ); // エラー出力メッセージを編集する AfxMessageBox( DllPathName[0], MB_OK | MB_ICONERROR ); // エラーメッセージ表示 return( FALSE ); // エラーで戻り値を返す } // パス名とＤＬＬ名を連結する strcat( DllPathName, DLL_NAME ); // インスタンスにDLLをリンクする // リンク失敗 if( Inst_ZZ_VC (HINSTANCE)HINSTANCE_ERROR ) { // デバッグ文出力 TRACE("%s[%d] LoadLibrary失敗\n",__file__,__line__); // エラーでリターンする return( FALSE ); } //----------------------------------------------------------------------------- /// ＤＬＬ関数のアドレスを取得 //----------------------------------------------------------------------------- // ソケット送信処理の関数アドレスを取得する // アドレス取得失敗 if( ZZsocsend_VC == NULL ) { // デバッグ文出力 TRACE("%s[%d] ZZsocsend_VC()アドレス取得失敗\n",__file__,__line__); // エラーでリターンする return( FALSE ); } // デバッグ文出力 TRACE("%s[%d] 終了\n",__file__,__line__); // 正常でリターンする return( TRUE ); } 手順としてはＤＬＬのパス名を取得して、リンクを張ります。 そしてGetProcAddress()関数を用いて関数アドレスに特定のアドレスに関数実体を割り当てます。 この時、外部変数定義で以下のような定義が必要になります。 ////////////////////////////////////////////////////////////////////////////////////// // ＤＬＬ参照用宣言 ////////////////////////////////////////////////////////////////////////////////////// // インスタンス EXTERN HINSTANCE Inst_ZZ_VC; // ZZ_VC.DLLへのインスタンス ////////////////////////////////////////////////////////////////////////////////////// // ＤＬＬの関数プロトタイプ宣言 ////////////////////////////////////////////////////////////////////////////////////// // ソケット送信処理 EXTERN long ( _stdcall * ZZsocsend_VC )( int soc, char *send_buf, UINT send_len ); 当然ＤＬＬを使用し終わったら解放します。 終了関数等に以下の行を追加して下さい。 //----------------------------------------------------------------------------- /// ＤＬＬリンク解放処理 //----------------------------------------------------------------------------- // ＤＬＬのリンクが有効かチェック
https://w.atwiki.jp/monstertv/pages/38.html
このページはhttp //park.geocities.jp/ts_encode09/1_01.htmlからの引用です Home BonDriverを用いたHDUS使用のメモ書き (1)用意するもの (2)リアルタイム視聴について (3)EPGで録画 (4)EPG番組表から録画～EPGデータビューア (1)用意するもの 2008/08/05現在 ・BonDriver_HDUS（人柱版6） ・EpgDataCap_Bon （人柱版８．２１） ・EPGデータビューア Ver 1.19 ・BonTest 1.41m3 すべて拡張ツールの中の人サイトのロダにあがっています。 (http //2sen.dip.jp/friio/fromup.html) 作者さんに感謝。 (2008/08/03追記) Microsoft社のサイトから Microsoft Visual C++ 2005 SP1 再頒布可能パッケージ http //www.microsoft.com/downloads/details.aspx?displaylang=ja FamilyID=200b2fd9-ae1a-4a14-984d-389c36f85647 Microsoft Visual C++ 2008 再頒布可能パッケージ http //www.microsoft.com/downloads/details.aspx?displaylang=ja FamilyID=9b2da534-3e03-4391-8a4d-074b9f2bc1bf DirectX End-User Runtimes (June 2008) - 日本語 http //www.microsoft.com/downloads/details.aspx?FamilyID=822640ab-0983-4c41-9c70-632f6f42c557 DisplayLang=ja の３つをダウンロードして、あらかじめインストールしておくことをオススメします。 EpgDataCap_Bonを解凍したあと出てくるフォルダの中にBonDriverというフォルダがあるので そこにBonDriver_HDUS.dllをコピー。 (2)リアルタイム視聴について ～その１：BonTest単体で視聴～ BontestのフォルダにBonDriver_HDUS.dllをいれて、BonDriver.dllにリネームするだけ。 Bontestフォルダに元々存在するBonDriver.dllは削除でok。 その後BonTest.exeを起動すれば地デジ番組を視聴できます。 チャンネル番号を直接指定する必要があるのに注意。 ***注意*** この方法では、EpgDataCap_BonやSegTVなどHDUSを使用するソフトが実行中の場合 「チューナーの初期化に失敗しました」となって視聴することができません。 またこの方法で視聴中にEpgTimer_Bonで予約していた録画時間になると 録画予約が失敗してしまいます。 ～その２：EpgDataCap_BonからUDP送信・BonTestで視聴～ BontestのフォルダにあるBonDriver.dllを削除し、BonDriver_UDP.dllをBonDriver.dllにリネーム。 (2008/08/05追記) BonDriver.dllの削除やBonDriver_UDP.dllのリネームを行わなくても、 EpgDataCap_Bonの「設定」→「外部アプリケーション設定」で 「View起動時のコマンドラインオプション」に /d BonDriver_UDP.dll と入れればokです。 /nd と入れなくとも視聴できるようです。 EpgDataCap_Bonの「設定」→「ネットワーク設定」タブで 「TSデータをUDPで送信する」にチェックをいれ デフォルトの「127.0.0.1 ポート1234」そのままで「追加」ボタン。 「外部アプリケーション設定」タブで「Viewで使用するexe」にBonTestを指定し、 「View起動時のコマンドラインオプション」に /nd と入れて「OK」。 その後、EpgDataCap_Bonの「View」ボタンを押すと BonTestが起動して視聴できるかと思います。 チャンネルの切替はBonTestではなくEpgDataCap_Bonで。 この方法で視聴中に音ズレが発生した場合、 BonTest右下の「リセット」ボタンを押すことで音ズレは解消されます。 この方法なら、EpgDataCap_Bonで録画中に同番組を視聴することが可能です。 またBonTestで視聴中にEpgTimer_Bonで登録していた予約の時間になった時は 予約録画の方が優先され、BonTestで視聴中のチャンネルが予約した番組のものに 自動的に変更され、録画が始まります。 ***注意*** EpgDataCap_bonからUDP送信・BonTestで視聴するにあたっては、 まずEpgDataCap_bonの方でチャンネル取得を行う必要があります。 ただ「チャンネルスキャン」ボタンを押してスキャンが終了するまで待つだけです。 (3)EPGで録画 EpgDataCap_Bon.exeを起動。チューナーがHDUSになっていることを確認。 まずはチャンネル取得のためチャンネルスキャン。終了までじっと待つ。 その後、「設定」→「EPG取得設定」にてチャンネル一覧より EPGを取得するチャンネルを選択します。 通常は全チェックで問題ないかと。 次にEPG取得。EPGデータ取得ボタンを押して、再びじっと待つ。 以上２つの操作で、 C \Documents and Settings\ユーザ名\My Documents\EpgTimerBon\ というフォルダにチャンネル設定が、 その下の C \Documents and Settings\ユーザ名\My Documents\EpgTimerBon\EpgData というフォルダにEPGデータが格納されています。 ついで、設定を行います。 「設定」→「基本設定」タブで番組を録画する場所を指定します。 さらにEPGを用いた録画予約です。 TSEpgView_Bonを起動。 「設定」でEPGデータを置いたフォルダと予約方法を設定します。 さきほどのMy Documents\EpgTimerBon\EpgDataをEPG読み込みフォルダに設定し、 予約方法ではEpgTimer_Bonを指定して、EpgTimer_Bonの場所を設定して「OK」。 後は好きな番組を選んで「予約登録」ボタンを押すだけで EpgTimer_Bonに予約されます。 最後にEpgTimer_Bonの設定です。 まずは右上の「設定」→「チューナー設定」タブでチューナーの種類と数を設定します。 HDUS１台であれば、下のように「地デジ 1」と設定して「OK」 再度「設定」→「動作設定」タブでEpgDataCap_Bonの場所を指定します。 その下の設定はお好みで。 以上でEPGによる録画予約はすべて完了です。 EpgTimer_Bonは常時起動させておいてください。 時間になればEpgDataCap_Bonが起動して録画が始まるはずです。 (4)EPG番組表から録画～EPGデータビューア 見やすい番組表を用いるにはEPGデータビューアを使います。 まずはEPGデータビューアを起動し、「設定」→「iEPG設定」と開きます。 「iEPG機能を使用する」にチェックを入れた後、 EpgTimer_Bonをチェックし、EpgTimer_Bonの場所を指定して「OK」。 次に「設定」→「画面設定」と開きます。 「予約番組の表示」でEpgTimerにチェックが入っていることを確認した後、 その右隣の「参照」にてProgram.txt(EpgTimer_Bonの予約一覧)の位置を指定します。 ここがひっかかりやすいところで デフォルトでは C \Documents and Settings\ユーザ名\My Documents\EpgTimer\Program.txt が指定されています。 ここを C \Documents and Settings\ユーザ名\My Documents\EpgTimerBon\Program.txt に書き換えます。 デフォルトだとEpgTimerとなっている部分をEpgTimerBonにするわけです。 あとは「ファイル」→「ファイルの読み込み」で C \Documents and Settings\ユーザ名\My Documents\EpgTimerBon\EpgData 以下のEPGファイルをすべて開けば、番組表が表示されます。 予約したい番組の番組名をクリックして「EpgTimer登録」ボタンを押せば EpgTimer_Bonに予約されます。 あとはさきほどと同様にEpgTimer_Bonを起動させておくと 時間になるとEpgDataCap_Bonが起動して録画が始まります。 ついでに、EpgTimer_BonやEpgDataCap_Bonの「設定」→「外部アプリケーション設定」で 「EPG表示で使用するexe」をEPGデータビューアに指定し、 「起動時のオプション」を「EpgDataCapのデータファイルパス一覧」に設定しておくと EpgTimer_BonやEpgDataCap_Bonで「EPG表示」ボタンを押した際に EPGデータビューアが立ち上がった上で、現在のEPG番組表を表示してくれます。 以上、大ざっぱな説明ですがHDUS利用のきっかけになれば幸いです。 Home
https://w.atwiki.jp/exvs2xb/pages/675.html
少し追記しました。おかしな箇所・間違ってる箇所等ありましたら修正をお願いします。 -- (名無しさん) 2021-11-03 22 58 45 今作は暗黒期だったね… 次回作では準環境くらいの位置で居座っていて欲しいなー また使いたい -- (名無しさん) 2023-04-01 23 38 46 【Vtuber】さくらゆいLive2d製作プロジェクト【クラリネット演奏VST】 クラウドファンディングがスタートしました！ https //camp-fire.jp/projects/view/751075?utm_campaign=cp_po_share_c_msg_mypage_projects_show 期間は7月12日（金）までです！ 一生のお願いです、どうかご協力お願いします！ -- (名無しさん) 2024-04-28 14 30 33
https://w.atwiki.jp/flyffer/pages/4.html
新しい配布場所 http //www42.tok2.com/home/flyffer/ 避難場所 http //flyffer.forums-free.com/ これがデフォルト時です。 ?xml version="1.0" encoding="shift-jis"? Flyffer option fps="1" skipPaint="1" skipClear="1" optimizePriority="1" optimizePriority2="0" noExclusive="1" noFullscreen="1" window="0" workArea="1" noFog="1" noVertexShader="0" wait="100" mute="0"/ module path="Flyffer/FlyfferOutput.dll"/ module path="Flyffer/FlyfferView.dll"/ module path="Flyffer/FlyfferAutoRepair.dll"/ !-- module path="Flyffer/FlyfferMusic.dll"/ module path="Flyffer/FlyfferDisguiser.dll"/ -- /Flyffer これでは !-- -- の間の部分が読み込んでいない為 Music.xml Disguiser.xml Scouter.xmlなどが 使えていない状態で、 !-- -- を消してしまえば 使えるようになります。 上記にはないですが module path="Flyffer/FlyfferFlyfferScouter.dll"/ も入れるといいでしょう。選択した相手のｌｖ職業などが分かります。
https://w.atwiki.jp/jamila/pages/13.html
トップページ ./ Visual Studio 2008内の特大アイコンを含むexeとdllのまとめ Visual Studio 2005、2008、2010でソリューションを共有する方法
https://w.atwiki.jp/fittle/pages/12.html
Fittle公式版 2006/03/25 Ver.2.2.1 正式版 配布先Fittle 公式版 2006/10/16 Ver.2.2.2 Preview 3 最終更新 2008/05/15 ソースコードの公開 Fittle非公式 開発版 オープンソース化されたFittleを基にしたバージョン 配布先 → GitHub f4b24版 (現在主流の開発版) 改変の方針 改変点も含めソースを公開 基本的には本体に機能を追加しない 本体から分離可能な機能があれば削除 削除した機能は何らかの方法で補う f4b24版、専用拡張子 詳しくはf4b24版 初期設定例を参照 拡張子 用途 配置パス .dll bass用 \Plugins\bass .dll Fittle公式用 \Plugins\Fittle .fap 仮想書庫用 \Plugins\fap .fcp 設定UI用 \Plugins\fcp .fgp 基本システム用 \Plugins\fgp .flp リストカラム拡張用 \Plugins\flp .fop 出力デバイス用 \Plugins\fop .fpf プレイリストANSI \ .fpu プレイリストUnicode \ .ini 設定ファイル \ f4b24版 履歴 test51x64bit版 test50/test50utreetool.fcp用機能追加 test49/test49utreetool.fgp用機能追加 test48/test48u長時間働かせようとするとストライキを起こしていた問題に対処 test47/test47u多段タブ表示設定時にタブを選択すると表示順だけでなく実際の順序まで入れ替わってしまう場合があった問題に対処 副作用で多段タブ表示時は選択済みのタブしか移動できない (test46/)test46utest44uの修正がtest45uに適切に反映されなかった問題に対処 test45/test45uWindows7/Vistaでシークバーと音量の背景にテーマが適用されなかった問題に対処 (test44/)test44uコンパイラのバグ(ではなく実際にはライブラリの問題)でtest42から関連ソースを何ら変更していないのにメタデータの末尾にゴミが付く場合があったtest43uの問題に対処 test43/test43uランダム再生時に常にリピートしていた問題に対処 test42/test42uID3V2.4ヘッダの非同期化フラグの解釈を変更 ID3V2.4の開発中バージョンをID3V2.4と同等と仮定して扱うように変更 f4b24t41 / f4b24t41u (ANSI / Unicode)一部のタグ形式で本来読めるはずのTrack情報が得られなかった問題に対処 ネットワークフォルダのアクセスを高速化するために省略したチェックを一箇所復活 空白を含むパスの外部ツールやファイラが起動しなかった問題に対処 UTF16(BE)のID3V2が読めなくなっていた問題に対処(fittle.exe/replaygain.fgp) cueシートに対応しない拡張子のFILEが指定されていた場合にファイルをクローズし忘れていた問題に対処(cue.fap) f4b24t39 / f4b24t39u (ANSI / Unicode)フルパスでソートする時にソート方法の設定が反映されていなかった問題に対処 ヘッダのドラッグ ドロップでリストカラムを一時的に入れ替え可能に。[入れ替え結果は保存されません] f4b24t38 / f4b24t38u (ANSI / Unicode)書庫内のタグ情報をリスト表示しない設定を追加 f4b24t37 / f4b24t37u (ANSI / Unicode)ボリュームバーとシークバーでのtooltip表示、右クリックで正常なメニューが表示されていなかった問題に対処 f4b24t36 / f4b24t36u (ANSI / Unicode)ドライブ一覧でのTabキー入力が検出できていなかった問題に対処 ランダム再生時に前の曲に戻った時に前の曲がリストから削除されていると不正なメモリアクセスが発生していた問題に対処 複数のFILE行を持つCUEシートに対応 f4b24t35 / f4b24t35u (ANSI / Unicode)CUE再生時にシークバーでトラックの末尾にシークすると次のトラック部分を再生してしまう場合があった問題に対処 ボリュームバーが負の値に設定される場合がある問題に対処 f4b24t34 / f4b24t34u (ANSI / Unicode)zip内の次曲に移行時などに再生が止まる環境があるらしい問題に勘でさらに対処 f4b24t33 / f4b24t33u (ANSI / Unicode)次曲に移行時にzipなどで再生が止まる環境があるらしいらしい問題に勘で対処 しおりに手動登録しなくてもネットワークパス(非推奨)をある程度利用できるように変更 f4b24t32 / f4b24t32u (ANSI / Unicode)前回最後に再生したファイルがみつからない場合リストが全選択される問題に対処 wadsp.fgpの安定性向上のためのbass.fopの変更 f4b24t31 / f4b24t31u (ANSI / Unicode)fgpの終了時にアクセス違反が発生する可能性があったらしい問題に対処 zipu.fapで特殊文字がエスケープされていなかった問題を修正 f4b24t30 / f4b24t30u (ANSI / Unicode)しおりの初期化が間に合っていなかった問題の修正(t29) f4b24t29 / f4b24t29u (ANSI / Unicode)プラグインの配置方法を変更。 設定の適用時に強制的にフォルダタブが選択されていた問題に対処 出力周波数の設定 (出力レート) ファイルヘッダにバージョンコードを設定 f4b24t28 / f4b24t28u (ANSI / Unicode)出力デバイス用ファイル追加 音声出力設定関連の分離 → output.fcp 標準で認識する拡張子の追加、mod mo3 xm it s3m mtm umx bass_tak.dllの仕様変更に対応 f4b24t27 / f4b24t27u (ANSI / Unicode)Ansi版にて、Windows98が起動できなかった問題を修正 f4b24t26 / f4b24t26u (ANSI / Unicode)BASSが音量増幅機能を持たないため無音になる場合があった問題に対処 f4b24t25 / f4b24t25u (ANSI / Unicode)BASSWMA2.4の仕様変更に対応 WinampDSPプラグイン対応機能を分離→wadsp.dll/wadsp.fcp f4b24t24 / f4b24t24u (ANSI / Unicode)ID3V2の非同期化フラグなどに対応 f4b24t23 / f4b24t23u (ANSI / Unicode)外部要因でタイトルバーのユニコード文字が表示できなくなる問題にさらに対処 f4b24t22 / f4b24t22u (ANSI / Unicode)Unicode非対応プラグインによってタイトルバーのユニコード文字が表示できなくなる問題に対処 ID3V2.4の非同期化フレームなどに対応 f4b24t21 / f4b24t21u (ANSI / Unicode)次に再生する予定の曲をリストから削除すると不正なメモリアクセスを行う可能性があった問題を修正 f4b24t20 / f4b24t20u (ANSI / Unicode)ファイル削除後におきていた問題の修正(t19) f4b24t19 / f4b24t19u (ANSI / Unicode)ツリーアイコン非表示時に無駄なアイコン取得が発生し起動速度が低下していた問題対策 f4b24t18 / f4b24t18u (ANSI / Unicode)標準再生に拡張子「aiff」追加 しおりを分離 → bookmark.dll / bookmarku.dll 終端文字の無いID3V2.2で末尾にゴミが付く問題対策 Unicodeミニパネル対応 f4b24t17 / f4b24t17u (ANSI / Unicode)TAR32.DLLをFittleと同ディレクトリに置いた時、誤動作する問題を修正 Unicode版のプラグインインタフェースの互換性向上 f4b24t16 / f4b24t16u (ANSI / Unicode)Unicode版の、プレイリストが Playlist.fpu に変更 m3u8対応 (Unicode版はWin98/SE/Meで動作しない) f4b24t15t13,t14で「プレイリストへ送る」が正常動作しなかった問題を修正 f4b24t14CUEシート読込を分離→cue.fap f4b24t13URLを追加を分離(アドレスを追加)→addurl.dll f4b24t12設定画面の分離 →fconfig.exe/fittle.fcp/fconfig.dll BOM付UTF-8/UTF16LE/BE CUESheet読込 (NiG氏のpatch取り込み) f4b24t11次曲へ移る処理の安定性向上 f4b24t10ミニパネルを分離 f4b24t9タスクバー上ホイールで音量を変えるプラグインtaskvol.dllとexplorerの修正 ファイル削除機能無効化プラグインxdelfile.dllを追加 書庫プラグインを最初に初期化 書庫プラグインzip.fap(要統合アーカイバプロジェクト版unzip32.dll)を追加 書庫プラグインrar.fap(要unrar.dll)を追加 書庫プラグインlha.fap(要統合アーカイバプロジェクト版unlha32.dll)を追加 書庫プラグインgca.fapを追加 書庫プラグインcab.fapを追加 プレイリストの保存処理を変更 f4b24t4zip書庫内ファイル再生機能削除 f4b24t3 bass2.4に修正対応 Fittle派生ソフト 紹介 fiddle 概要 Fittleをもとに◆Mdf1MBqBj.さんが開発したクローンソフト。 概観はFittleと比べてシンプル。機能も必要最小限に抑えてあり、設定も簡略化しているので扱いやすい。 アイコンはローゼンメイデンの翆星石(?)。 現在の最新ver：fiddle080519 本体はInternet Archiveで入手可能。fiddle公式HP
https://w.atwiki.jp/lockerroom/pages/13.html
ActiveX.ahk /* COM操作ライブラリby 流行らせるページ管理人 Ver 3β / ActiveX(){ global IID_IDispatch =GUID("{00020400-0000-0000-C000-000000000046}") IID_IUnknown =GUID("{00000000-0000-0000-C000-000000000046}") IID_NULL =GUID("{00000000-0000-0000-0000-000000000000}") IID_IConnectionPointContainer =GUID("{B196B284-BAB4-101A-B69C-00AA00341D07}") IID_IProvideClassInfo =GUID("{B196B283-BAB4-101A-B69C-00AA00341D07}") ;IID_IProvideClassInfo2 =GUID("{A6BC3AC0-DBAA-11CE-9DE3-00AA004BB851}") LOCALE_USER_DEFAULT =DllCall("kernel32.dll¥GetUserDefaultLCID") CoInitialize() } /* ********************************** 汎用メモリ管理 ********************************** / ;メモリを確保しポインタを返す Malloc(size,flag=0x40){ return DllCall("kernel32.dll¥GlobalAlloc","UInt",flag,"UInt",size,"UInt") } ;ポインタで指定されたメモリを解放する Free(p){ DllCall("kernel32.dll¥GlobalFree",UInt,p,UInt) } /* ********************************** GUID関連 ********************************** / ;CLSID文字列からGUID構造体を生成しアドレスを得る(仮) GUID(string){ size =DllCall("kernel32.dll¥MultiByteToWideChar","UInt",0,"UInt",0,"Str",string,"Int",-1,"UInt",0,"Int",0) wstr =Malloc((size+1)*2) DllCall("kernel32.dll¥MultiByteToWideChar","UInt",0,"UInt",0,"Str",string,"Int",-1,"UInt",wstr,"Int",(size+1)*2) ptr =Malloc(16) DllCall("ole32.dll¥CLSIDFromString","UInt",wstr,"UInt",ptr) Free(wstr) return ptr } ;ProgID文字列からGUID構造体を生成しアドレスを得る(仮) ProgID(string){ size =DllCall("kernel32.dll¥MultiByteToWideChar","UInt",0,"UInt",0,"Str",string,"Int",-1,"UInt",0,"Int",0) wstr =Malloc((size+1)*2) DllCall("kernel32.dll¥MultiByteToWideChar","UInt",0,"UInt",0,"Str",string,"Int",-1,"UInt",wstr,"Int",(size+1)*2) ptr =Malloc(16) DllCall("ole32.dll¥CLSIDFromProgID","UInt",wstr,"UInt",ptr) Free(wstr) return ptr } ;GUID構造体を文字列に変換 fromGUID(ByRef guid){ ptr =Malloc(80) DllCall("ole32.dll¥StringFromGUID2","UInt",guid,"UInt",ptr,"Int",80) res =wc2mb(ptr) Free(ptr) return res } /* ********************************** Unicode関連 ********************************** / ;文字列からにUnicodeへの変換を行う ;返り値はUnicode文字列へのポインタ mb2wc(mbstr){ size =(DllCall("kernel32.dll¥MultiByteToWideChar","UInt",0,"UInt",0,"Str",mbstr,"Int",-1,"UInt",0,"Int",0)+1)*2 wstr =Malloc(size) DllCall("kernel32.dll¥MultiByteToWideChar","UInt",0,"UInt",0,"Str",mbstr,"Int",-1,"UInt",wstr,"Int",size) return wstr } mb2wc_ref(ByRef mbstr){ size =(DllCall("kernel32.dll¥MultiByteToWideChar","UInt",0,"UInt",0,"Str",mbstr,"Int",-1,"UInt",0,"Int",0)+1)*2 wstr =Malloc(size) DllCall("kernel32.dll¥MultiByteToWideChar","UInt",0,"UInt",0,"Str",mbstr,"Int",-1,"UInt",wstr,"Int",size) return wstr } ;UnicodeからAnsi文字列への変換を行う ;返り値は文字列 wc2mb(wstr){ size =DllCall("kernel32.dll¥WideCharToMultiByte","UInt",0,"UInt",0,"UInt",wstr,"Int",-1,"UInt",0,"Int",0,"UInt",0,"UInt",0) VarSetCapacity(mbstr,size) DllCall("kernel32.dll¥WideCharToMultiByte","UInt",0,"UInt",0,"UInt",wstr,"Int",-1,"Str",mbstr,"Int",size,"UInt",0,"UInt",0) return mbstr } wc2mb_ref(wstr,ByRef mbstr){ size =DllCall("kernel32.dll¥WideCharToMultiByte","UInt",0,"UInt",0,"UInt",wstr,"Int",-1,"UInt",0,"Int",0,"UInt",0,"UInt",0) VarSetCapacity(mbstr,size) DllCall("kernel32.dll¥WideCharToMultiByte","UInt",0,"UInt",0,"UInt",wstr,"Int",-1,"Str",mbstr,"Int",size,"UInt",0,"UInt",0) return size } /* ********************************** COM汎用 ********************************** / CoInitialize(){ return DllCall("ole32.dll¥CoInitialize","UInt",0,"UInt") } CoUninitialize(){ return DllCall("ole32.dll¥CoUninitialize","UInt",0,"UInt") } OleInitialize(){ return DllCall("ole32.dll¥OleInitialize","UInt",0,"UInt") } OleUninitialize(){ return DllCall("ole32.dll¥OleUninitialize","UInt",0,"UInt") } CoTaskMemAlloc(size){ return DllCall("ole32.dll¥CoTaskMemAlloc","UInt",size,"UInt") } CoTaskMemFree(ptr){ return DllCall("ole32.dll¥CoTaskMemFree","UInt",ptr,"UInt") } M(ByRef ip,idx=0){ return NumGet(NumGet(ip+0)+4*idx) } QueryInterface(pObj,strIID=""){ global IID_IDispatch guid =0 if(strIID=""){ IID =IID_IDispatch }else if(StrLen(strIID)=38){ IID =GUID(strIID) }else{ IID =strIID } res =0 ErrorLevel =DllCall(M(pObj,0),"UInt",pObj,"UInt",IID,"UIntP",res) return res } AddRef(pObj){ if(pObj){ DllCall(M(pObj,1),"UInt",pObj) } return pObj } Release(pObj){ if(pObj){ return DllCall(M(pObj,2),"UInt",pObj) } } ReleaseL(p1,p2=-1,p3=-1,p4=-1,p5=-1,p6=-1,p7=-1,p8=-1,p9=-1){ format =A_FormatInteger SetFormat,Integer,D Loop,10{ if(p%A_Index%!=-1){ Release(p%A_Index%) } } SetFormat,Integer,%format% } /* ********************************** VARIANT関連 ********************************** / ;Ansi文字列をBSTR形式に変換する toBSTR(str){ oc =mb2wc(str) res =DllCall("oleaut32.dll¥SysAllocString","UInt",oc,"UInt") Free(oc) return res } ;BSTRをAnsi文字列に変換する fromBSTR(bstr){ return wc2mb(bstr) } ;BSTRを解放する(VariantClear内でやってくれるはずなので多分不要) freeBSTR(bstr,get=0){ if(get!=0){ wc2mb_ref(bstr,res) }else{ res= } DllCall("oleaut32.dll¥SysFreeString","UInt",bstr) return res } vNull(){ return 0x7FFFFFFF00000000 } vObj(obj){ return 0x7FFFFFFF00000000 | obj } ;VARIANTに変換(typeには変換したい型を指定 ;settypeを指定すると、型変換した上で、型を示す値としてsettypeで指定した型を格納する toVariant(value,variant=0,type=0x08,settype=-1){ global LOCALE_USER_DEFAULT ;格納先初期化 if(variant=0){ dest =Malloc(16) }else{ dest =variant } DllCall("oleaut32.dll¥VariantInit","UInt",dest) if(type=0x08){ if(value 32 = 0x7FFFFFFF){ if(value-0x7FFFFFFF00000000=0){ ;VT_NULL NumPut(0x01,dest+0,0,"UShort") }else{ ;VT_DISPATCH NumPut(0x09,dest+0,0,"UShort") NumPut(value - 0x7FFFFFFF00000000,dest+8,0) } }else{ ;文字列の場合 NumPut(0x08,dest+0,0,"UShort") NumPut(toBSTR(value),dest+8,0) } }else{ ;それ以外の型の場合 tmp =toVariant(value) DllCall("oleaut32.dll¥VariantChangeTypeEx","UInt",dest,"UInt",tmp,"UInt",LOCALE_USER_DEFAULT,"UShort",0,"UShort",type) if(settype!=-1){ NumPut(settype,dest+0,0,"UShort") } vFree(tmp) } return dest } ;VARIANTに格納された内容を通常のAutoHotkey変数として取得 ;rawsizeが1,2,4の場合、格納されている生の値を取得 ;rawsizeが0の場合、文字列に変換して取得 fromVariant(var,rawsize=0){ global LOCALE_USER_DEFAULT if(rawsize=0){ type =NumGet(var+0,0,"UShort") if((type=9)||(type=13)){ ;COMオブジェクト pObj =NumGet(var+8) AddRef(pObj) return pObj }else if(type 0xFF){ ;ポインタもしくは配列(暫定) return NumGet(var+8) }else{ ;VT_BSTRに変換 var2 =Malloc(16) DllCall("oleaut32.dll¥VariantInit","UInt",var2) DllCall("oleaut32.dll¥VariantChangeTypeEx","UInt",var2,"UInt",var,"UInt",LOCALE_USER_DEFAULT,"UShort",0,"UShort",0x8) ;値をAnsiに変換 wc2mb_ref(NumGet(var2+8),res) vFree(var2) return res } }else if(rawsize=1){ return NumGet(var+8,0,"UChar") }else if(rawsize=2){ return NumGet(var+8,0,"UShort") }else if(rawsize=4){ return NumGet(var+8) }else{ return fromVariant(var,0) } } ;VARIANTを解放(getに-1以外を指定すると、値を取得して返す) vFree(ByRef var,get=-1){ if(get!=-1){ res =fromVariant(var,get) }else{ res =0 } DllCall("oleaut32.dll¥VariantClear","UInt",var) Free(var) return res } /* ********************************** IDispatch用 ********************************** / ;オブジェクトを生成する CreateObject(clsid,iid="",CLSCTX=5){;CLSCTX_SERVER global IID_IDispatch if(!IID_IDispatch){ ActiveX() } guid =0 if(RegExMatch(clsid,"^¥{[¥-0-9a-fA-F]{36}¥}$")){ guid =GUID(clsid) }else{ guid =ProgID(clsid) } if(iid=""){ iid2 =IID_IDispatch }else{ iid2 =GUID(iid) } ppRes =0 el =DllCall("ole32.dll¥CoCreateInstance","UInt",guid,"UInt",0,"UInt",CLSCTX,"UInt",iid2,"UIntP",ppRes,"UInt") Free(guid) if(iid2!=IID_IDispatch){ Free(iid2) } ErrorLevel =el return ppRes } ;objが持つnameメンバのDispatchIDを得る GetDispID(ByRef obj,name){ global IID_NULL,LOCALE_USER_DEFAULT wName =mb2wc_ref(name) dispid =0 DllCall(M(obj,5),"UInt",obj,"UInt",IID_NULL,"UIntP",wName,"UInt",1,"UInt",LOCALE_USER_DEFAULT,"UIntP",dispid,"UInt") Free(wName) return dispid } ;引数からDISPPARAMSを生成 CreateParam(ByRef p1, ByRef p2, ByRef p3, ByRef p4, ByRef p5, ByRef p6, ByRef p7, ByRef p8, ByRef p9, ByRef p10){ ;引数を数える(0xFFFFFFFFFFFFFFFFの前までが与えられた引数) num =0 format =A_FormatInteger SetFormat,Integer,D Loop,10{ if(p%A_Index%=0xFFFFFFFFFFFFFFFF){ break } num++ } ;num個のVARIANTARG配列を作成 if(num=0){ pvArgs =0 }else{ pvArgs =Malloc(16*num) ptr =pvArgs+16*(num-1) ;引数をセットしていく Loop,%num%{ toVariant(p%A_Index%,ptr) ptr-=16 } } SetFormat,Integer,%format% ;DISPPARAMS作成 res =Malloc(16) NumPut(pvArgs,res+0) NumPut(num,res+8) return res } ;DISPPARAMSを解放 FreeParam(ByRef params){ num =NumGet(params+8) pvArgs =NumGet(params+0) pvNArgs =NumGet(params+4) ;VARIANTARGの解放処理 ptr =pvArgs Loop,%num%{ vFree(ptr) ptr+=16 } ;VARIANTARG自体の解放 Free(ptr) ;rgdispidNamedArgsの解放 if(pvNArgs!=0){ Free(pvNArgs) } ;本体メモリ解放 Free(params) } Invoke(ByRef pObj,ByRef dispid,mode,ByRef params){ global IID_NULL,LOCALE_USER_DEFAULT pvRes =Malloc(16) DllCall("oleaut32.dll¥VariantInit",UInt,pvRes) DllCall(M(pObj,6),UInt,pObj,UInt,dispid,UInt,IID_NULL,UInt,LOCALE_USER_DEFAULT,UInt,mode,UInt,params,UInt,pvRes,UInt,0,UInt,0,UInt) return pvRes } inv(obj,name,p1=0xFFFFFFFFFFFFFFFF,p2=0xFFFFFFFFFFFFFFFF,p3=0xFFFFFFFFFFFFFFFF,p4=0xFFFFFFFFFFFFFFFF,p5=0xFFFFFFFFFFFFFFFF,p6=0xFFFFFFFFFFFFFFFF,p7=0xFFFFFFFFFFFFFFFF,p8=0xFFFFFFFFFFFFFFFF,p9=0xFFFFFFFFFFFFFFFF,p10=0xFFFFFFFFFFFFFFFF){ if((dispid =GetDispID(obj,name))!=0){ params =CreateParam(p1,p2,p3,p4,p5,p6,p7,p8,p9,p10) pvRes =Invoke(obj,dispid,1,params) FreeParam(params) return vFree(pvRes,0) } } gp(obj,name,p1=0xFFFFFFFFFFFFFFFF,p2=0xFFFFFFFFFFFFFFFF,p3=0xFFFFFFFFFFFFFFFF,p4=0xFFFFFFFFFFFFFFFF,p5=0xFFFFFFFFFFFFFFFF,p6=0xFFFFFFFFFFFFFFFF,p7=0xFFFFFFFFFFFFFFFF,p8=0xFFFFFFFFFFFFFFFF,p9=0xFFFFFFFFFFFFFFFF,p10=0xFFFFFFFFFFFFFFFF){ if((dispid =GetDispID(obj,name))!=0){ params =CreateParam(p1,p2,p3,p4,p5,p6,p7,p8,p9,p10) pvRes =Invoke(obj,dispid,2,params) FreeParam(params) return vFree(pvRes,0) } } pp(obj,name,p1=0xFFFFFFFFFFFFFFFF,p2=0xFFFFFFFFFFFFFFFF,p3=0xFFFFFFFFFFFFFFFF,p4=0xFFFFFFFFFFFFFFFF,p5=0xFFFFFFFFFFFFFFFF,p6=0xFFFFFFFFFFFFFFFF,p7=0xFFFFFFFFFFFFFFFF,p8=0xFFFFFFFFFFFFFFFF,p9=0xFFFFFFFFFFFFFFFF,p10=0xFFFFFFFFFFFFFFFF){ if((dispid =GetDispID(obj,name))!=0){ params =CreateParam(p1,p2,p3,p4,p5,p6,p7,p8,p9,p10) ;rgdispidNamedArgsのセット namedArgs =Malloc(4) NumPut(namedArgs,params+4) NumPut(0xFFFFFFFD,namedArgs+0) NumPut(1,params+12) pvRes =Invoke(obj,dispid,4,params) FreeParam(params) return vFree(pvRes) } } /* ********************************** イベントシンク用コールバック関数 ********************************** / GuidIsEqual(guid1,guid2){ return DllCall("MSVCRT.dll¥memcmp","UInt",guid1,"UInt",guid2,"UInt",16)=0 } EVENTSINK_QueryInterface(pEv,iid,ppv){ global if(GuidIsEqual(iid,NumGet(pEv+8))||GuidIsEqual(iid,IID_IDispatch)||GuidIsEqual(iid,IID_IUnknown)){ NumPut(pEv,ppv+0) DllCall(M(pEv,1),"UInt",pEv) return 0 } NumPut(0,ppv+0) return 0x80004002 } EVENTSINK_AddRef(pEv){ cRef =NumGet(pEv+4) cRef++ NumPut(cRef,pEv+4) return cRef } EVENTSINK_Release(pEv){ cRef =NumGet(pEv+4) cRef-- NumPut(cRef,pEv+4) if(cRef==0){ EVENTSINK_Destructor(pEv) } return cRef } EVENTSINK_GetTypeInfoCount(pEv,pct){ NumPut(0,pct+0) return 0 } EVENTSINK_GetTypeInfo(pEv,info,lcid,pInfo){ return 0x8002000B;DISP_E_BADINDEX } EVENTSINK_GetIDsOfNames(pEv,riid,szNames,cNames,lcid,pDispID){ return 0x80020006;DISP_E_UNKNOWNNAME } EVENTSINK_Invoke(pEv,dispid,riid,lcid,wFlags,params,pvRes,exinf,argerr){ pTypeInfo =NumGet(pEv+24) ;GetNames hr =DllCall(M(pTypeInfo,7),"UInt",pTypeInfo, "UInt",dispid, "UIntP",bstr, "UInt",1, "UIntP",count) if(hr!=0){ return 0 } wc2mb_ref(bstr,ev) cb =GetOleEventCallback(NumGet(pEv+12),ev) if(cb){ DllCall(cb,"UInt",NumGet(pEv+28), "UInt",params, "UInt",pvRes) } } EVENTSINK_Constructor(){ static vtEventSink if(!vtEventSink){ vtEventSink =Malloc(28) NumPut(RegisterCallback("EVENTSINK_QueryInterface"),vtEventSink+0) NumPut(RegisterCallback("EVENTSINK_AddRef"),vtEventSink+4) NumPut(RegisterCallback("EVENTSINK_Release"),vtEventSink+8) NumPut(RegisterCallback("EVENTSINK_GetTypeInfoCount"),vtEventSink+12) NumPut(RegisterCallback("EVENTSINK_GetTypeInfo"),vtEventSink+16) NumPut(RegisterCallback("EVENTSINK_GetIDsOfNames"),vtEventSink+20) NumPut(RegisterCallback("EVENTSINK_Invoke"),vtEventSink+24) } pEv =Malloc(32) NumPut(vtEventSink,pEv+0) return pEv } EVENTSINK_Destructor(pEv){ Release(NumGet(pEv+28)) Free(pEv) } /* ********************************** コネクト用のインターフェイスIDを検索 ********************************** / find_iid(ByRef obj,ByRef itf,ByRef iid,ByRef refPTypeInfo=0xFFFFFFFFFFFFFFFF){ global LOCALE_USER_DEFAULT ;GetTypeInfo hr =DllCall(M(disp,4),"UInt",obj, "UInt",0, "UInt",LOCALE_USER_DEFAULT, "UIntP",pTypeInfo) if(hr!=0){ return hr } ;GetContainingTypeLib hr =DllCall(M(pTypeInfo,18),"UInt",pTypeInfo, "UIntP",pTypeLib, "UIntP",index) Release(pTypeInfo) if(hr!=0){ return hr } if(!itf){ ;GetTypeInfoOfGuid hr =DllCall(M(pTypeLib,5),"UInt",pTypeLib, "UIntP",iid, "UIntP",refPTypeInfo) Release(pTypeLib) return hr } count =DllCall(M(pTypeLib,3),"UInt",pTypeLib);GetTypeInfoCount found =0 index =0 Loop,%count%{ hr =DllCall(M(pTypeLib,4),"UInt",pTypeLib, "UInt",index, "UIntP",pTypeInfo);GetTypeInfo if(hr!=0){ break } hr =DllCall(M(pTypeInfo,3),"UInt",pTypeInfo, "UIntP",pTypeAttr);GetTypeAttr if(hr!=0){ Release(pTypeInfo) break } if(NumGet(pTypeAttr+40)==5){;typekind==TKIND_COCLASS cTypes =NumGet(pTypeAttr+48,"UShort");cImplTypes type =0 Loop,%cTypes%{ hr =DllCall(M(pTypeInfo,8),"UInt",pTypeInfo, "UInt",type, "UIntP",RefType);GetRefTypeOfImplType if(hr!=0){ break } hr =DllCall(M(pTypeInfo,14),"UInt",pTypeInfo, "UInt",RefType, "UIntP",pImplTypeInfo);GetRefTypeInfo if(hr!=0){ break } ;GetDocumentation hr =DllCall(M(pImplTypeInfo,12),"UInt",pImplTypeInfo, "Int",-1, "UIntP",bstr, "UInt",0, "UInt",0, "UInt",0) if(hr!=0){ Release(pImplTypeInfo) break } wc2mb_ref(bstr,str) if(str==itf){ ;GetTypeAttr if(DllCall(M(pImplTypeInfo,3),"UInt",pImplTypeInfo, "UIntP",pImplTypeAttr)=0){ found =1 iid =Malloc(16) DllCall("kernel32.dll¥RtlMoveMemory", "UInt",iid, "UInt",pImplTypeAttr, "UInt",16) if(refPTypeInfo!=0xFFFFFFFFFFFFFFFF){ refPTypeInfo =pImplTypeInfo AddRef(pImplTypeInfo) } ;ReleaseTypeAttr DllCall(M(pImplTypeInfo,3),"UInt",pImplTypeInfo, "UInt",pImplTypeAttr) } } Release(pImplTypeInfo) if(found||(hr!=0)){ break } type++ } } hr =DllCall(M(pTypeInfo,3),"UInt",pTypeInfo, "UInt",pTypeAttr);ReleaseTypeAttr Release(pTypeInfo) if(found||(hr!=0)){ break } index++ } Release(pTypeLib) if(!found){ return 0x80004002 }else{ return hr } } find_default_source(ByRef obj,ByRef iid,ByRef refPTypeInfo){ global IID_IProvideClassInfo;,IID_IProvideClassInfo2 /* pProvideClassInfo2 =QueryInterface(obj,IID_IProvideClassInfo2) if(ErrorLevel________==0){ ;GetGUID hr =DllCall(M(pProvideClassInfo2,4),"UInt",pProvideClassInfo2, "UInt",1, "UIntP",iid) Release(pProvideClassInfo2) return find_iid(obj,"",iid,refPTypeInfo) } / pProvideClassInfo =QueryInterface(obj,IID_IProvideClassInfo) if(ErrorLevel!=0){ return ErrorLevel } ;GetClassInfo hr =DllCall(M(pProvideClassInfo,3),"UInt",pProvideClassInfo, "UIntP",pTypeInfo) Release(pProvideClassInfo) if(hr!=0){ return hr } ;GetTypeAttr hr =DllCall(M(pTypeInfo,3),"UInt",pTypeInfo, "UIntP",pTypeAttr) if(hr!=0){ Release(pTypeInfo) return hr } cTypes =NumGet(pTypeAttr+48,"UShort");cImplTypes type =0 Loop,%cTypes%{ hr =DllCall(M(pTypeInfo,9),"UInt",pTypeInfo, "UInt",type, "UIntP",iFlags);GetImplTypeFlags if(hr!=0){ continue } if((iFlags 0x3)=0x3){;((iFlags IMPLTYPEFLAG_FDEFAULT) (iFlags IMPLTYPEFLAG_FSOURCE)) hr =DllCall(M(pTypeInfo,8),"UInt",pTypeInfo, "UInt",type, "UIntP",RefType);GetRefTypeOfImplType if(hr!=0){ continue } hr =DllCall(M(pTypeInfo,14),"UInt",pTypeInfo, "UInt",RefType, "UIntP",refPTypeInfo);GetRefTypeInfo if(hr!=0){ break } } type++ } DllCall(M(pTypeInfo,3),"UInt",pTypeInfo, "UInt",pTypeAttr);ReleaseTypeAttr Release(pTypeInfo) if(!refPTypeInfo){ if(hr==0){ return 0x8000FFFF }else{ return hr } } if(DllCall(M(refPTypeInfo,3),"UInt",refPTypeInfo, "UIntP",pTypeAttr)=0){;GetTypeAttr iid =Malloc(16) DllCall("kernel32.dll¥RtlMoveMemory", "UInt",iid, "UInt",pTypeAttr, "UInt",16) DllCall(M(refPTypeInfo,3),"UInt",refPTypeInfo, "UInt",pTypeAttr);ReleaseTypeAttr }else{ Release(refPTypeInfo) refPTypeInfo ="" } return hr } EntryOleEventPrefix(ByRef prefix){ global static OleEventCount=0 if(OleEventID_%prefix%){ return OleEventID_%prefix% }else{ OleEventID_%prefix% =OleEventCount OleEventPrefix_%OleEventCount% =prefix return OleEventCount++ } } GetOleEventCallback(id,ByRef evt){ global local prefix,cb prefix =OleEventPrefix_%id% if(prefix){ if(OleEventCallback_%prefix%%evt%){ return OleEventCallback_%prefix%%evt% } cb =RegisterCallback(prefix . evt) if(cb){ OleEventCallback_%prefix%%evt% =cb return cb } } } ConnectObject(obj,prefix,itf=0xFFFFFFFFFFFFFFFF){ global IID_IConnectionPointContainer if(itf==0xFFFFFFFFFFFFFFFF){ hr =find_default_source(obj,iid,pTypeInfo) }else{ hr =find_iid(obj,itf,iid,pTypeInfo) } if(hr!=0){ ErrorLevel =hr return 0 } pContainer =QueryInterface(obj,IID_IConnectionPointContainer) if(ErrorLevel!=0){ Release(pTypeInfo) return 0 } ;FindConnectionPoint hr =DllCall(M(pContainer,4),"UInt",pContainer, "UInt",iid, "UIntP",pConnectionPoint) Release(pContainer) if(hr!=0){ Release(pTypeInfo) return 0 } pIEV =EVENTSINK_Constructor() NumPut(iid,pIEV+8) ;Advise hr =DllCall(M(pConnectionPoint,5),"UInt",pConnectionPoint, "UInt",pIEV, "UIntP",dwCookie) if(hr!=0){ return 0 } AddRef(obj) evid =EntryOleEventPrefix(prefix) NumPut(evid,pIEV+12) NumPut(dwCookie,pIEV+16) NumPut(pConnectionPoint,pIEV+20) NumPut(pTypeInfo,pIEV+24) NumPut(obj,pIEV+28) } evArgc(ByRef para){ return NumGet(para+8) } evArgv(ByRef para,idx){ num =NumGet(para+8) if(idx num){ return fromVariant(NumGet(para+0)+(num-1-idx)*16) } } evReturn(ByRef res,value){ toVariant(value,res) } /* ********************************** ディスパッチオブジェクト作成 ********************************** / DISPATCH_QueryInterface(ptr,iid,ppv){ global if(GuidIsEqual(iid,IID_IDispatch)||GuidIsEqual(iid,IID_IUnknown)){ NumPut(ptr,ppv+0) DllCall(M(ptr,1),"UInt",ptr) return 0 }else{ NumPut(0,ppv+0) return 0x80004002 } } DISPATCH_AddRef(ptr){ cRef =NumGet(ptr+4) cRef++ NumPut(cRef,ptr+4) return cRef } DISPATCH_Release(ptr){ cRef =NumGet(ptr+4) cRef-- NumPut(cRef,ptr+4) if(cRef==0){ Free(ptr) } return cRef } DISPATCH_GetTypeInfoCount(ptr,pct){ NumPut(0,pct+0) return 0 } DISPATCH_GetTypeInfo(ptr,info,lcid,pInfo){ return 0x8002000B;DISP_E_BADINDEX } DISPATCH_GetIDsOfNames(ptr,riid,pszNames,cNames,lcid,pDispID){ wc2mb_ref(NumGet(pszNames+0),name) hr =GetOleMethodCallback(NumGet(ptr+12),name,cb) NumPut(cb,pDispID+0) return hr } DISPATCH_Invoke(ptr,dispid,riid,lcid,wFlags,params,pvRes,exinf,argerr){ DllCall(dispid,"UInt",ptr, "UInt",params, "UInt",pvRes, "UInt",wFlags) return 0 } EntryOleMethodsPrefix(ByRef prefix,ByRef id){ global static OleMethodsCount=0 if(OleMethodsID_%prefix%){ id =OleMethodsID_%prefix% }else{ OleMethodsID_%prefix% =OleMethodsCount OleMethodsPrefix_%OleMethodsCount% =prefix id =OleMethodsCount++ } } GetOleMethodCallback(id,ByRef name,ByRef cb){ global local prefix cb =0 prefix =OleMethodsPrefix_%id% if(prefix){ if(OleMethodCallback_%prefix%%name%){ cb =OleMethodCallback_%prefix%%name% return 0 }else{ cb =RegisterCallback(prefix . name) if(cb){ OleMethodCallback_%prefix%%name% =cb return 0 }else{ return 0x80020006 } } } } CreateDispatchObject(prefix,exsize=0){ global IID_IDispatch static vtDispatch if(!vtDispatch){ vtDispatch =Malloc(28) NumPut(RegisterCallback("DISPATCH_QueryInterface"),vtDispatch+0) NumPut(RegisterCallback("DISPATCH_AddRef"),vtDispatch+4) NumPut(RegisterCallback("DISPATCH_Release"),vtDispatch+8) NumPut(RegisterCallback("DISPATCH_GetTypeInfoCount"),vtDispatch+12) NumPut(RegisterCallback("DISPATCH_GetTypeInfo"),vtDispatch+16) NumPut(RegisterCallback("DISPATCH_GetIDsOfNames"),vtDispatch+20) NumPut(RegisterCallback("DISPATCH_Invoke"),vtDispatch+24) } EntryOleMethodsPrefix(prefix,id) ptr =Malloc(12+exsize) NumPut(vtDispatch,ptr+0) NumPut(IID_IDispatch,ptr+8) NumPut(id,ptr+12) return ptr }
https://w.atwiki.jp/musaka/pages/19.html
GLUTによる文字描画 glut.h ・glutStrokeCharacter 関数の定義－参考HP１より void drawStrokeString(GLfloat x, GLfloat y, float xscl, float yscl,void *font, char *string) { glPushMatrix(); glTranslatef(x, y, 0); glScalef(xscl, yscl, 1.0f); while (*string) glutStrokeCharacter(font, *string++); glPopMatrix(); } 使用例 case WM_PAINT glClearColor((GLclampf)0.7, (GLclampf)0.8, (GLclampf)0.8, 0.0); glClear( GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT ); //視点の変換行列の初期化 glLoadIdentity(); CalcCameraPosition(camera_theta,camera_phi,camera_distance,camera_centerX,camera_centerY,camera_centerZ, camera_positionX, camera_positionY, camera_positionZ, camera_upY); //視点の決定 gluLookAt(camera_positionX, camera_positionY, camera_positionZ,0.0,0.0,0.0,0.0,camera_upY,0.0);// camera_centerX,camera_centerY,camera_centerZ, 0.0,1.0,0.0); glPushMatrix(); glTranslated(5.0,0.0,0.0); drawStrokeString(1.0f,1.0f,0.02f,0.02f,GLUT_STROKE_ROMAN,"5"); glPopMatrix(); glFlush(); mygraph.Draw(hMemDC,0,0,MEM_WIDTH,MEM_HEIGHT); hdc = BeginPaint(hWnd, ps); // TODO 描画コードをここに追加してください... BitBlt(hdc,0,0,WINDOW_WIDTH,WINDOW_HEIGHT,hMemDC,0,0,SRCCOPY);//ここでhMemDCに書き込んだ内容を一気hdcに転送する EndPaint(hWnd, ps); break; FTGLによる文字描画 ・FTGLPolygonFont #include FTGLPolygonFont.h #define FONT "C \\WINDOWS\\Fonts\\meiryo.ttc"//sazanami-mincho.ttf"//sazanami-gothic.ttf #define SIZE 5.0 #define DEPTH 1.5 FTFont *font; 使用例 case WM_CREATE font = new FTGLPolygonFont(FONT); if (font- Error()) exit(1); // can t open font file if (!font- FaceSize(SIZE)) exit(1); // can t set font size if (!font- CharMap(ft_encoding_unicode)) exit(1); // can t set charmap break; case WM_PAINT glClearColor((GLclampf)0.7, (GLclampf)0.8, (GLclampf)0.8, 0.0); glClear( GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT ); //視点の変換行列の初期化 glLoadIdentity(); CalcCameraPosition(camera_theta,camera_phi,camera_distance,camera_centerX,camera_centerY,camera_centerZ, camera_positionX, camera_positionY, camera_positionZ, camera_upY); //視点の決定 gluLookAt(camera_positionX, camera_positionY, camera_positionZ,0.0,0.0,0.0,0.0,camera_upY,0.0);// camera_centerX,camera_centerY,camera_centerZ, 0.0,1.0,0.0); glPushMatrix(); glColor3d(0.0, 0.0, 0.0); glTranslated(0.0, 5.0, 0.0); font- Render(TEXT("こんにちわ")); glPopMatrix(); glFlush(); mygraph.Draw(hMemDC,0,0,MEM_WIDTH,MEM_HEIGHT); hdc = BeginPaint(hWnd, ps); // TODO 描画コードをここに追加してください... BitBlt(hdc,0,0,WINDOW_WIDTH,WINDOW_HEIGHT,hMemDC,0,0,SRCCOPY);//ここでhMemDCに書き込んだ内容を一気hdcに転送する EndPaint(hWnd, ps); break; 参考HP １.http //www.exa-corp.co.jp/solution/UBIQ/OpenGL/OpenGL-text-091.pdf ２.http //www.kushiro-ct.ac.jp/yanagawa/project/ftgl/FTGLPolygonFontの使用方法 ３.http //pages.cpsc.ucalgary.ca/~pneumann/wiki/pmwiki.php?n=MyUniversity.NotePad ビルド済みFreeType2とFTGLのインクルードヘッダとDLLとlibがダウンロードできるが,私の環境では動かなかった。 ４.http //nanabit.net/programming/python-prog/一部ビルド方法 ５.http //www.xmission.com/~nate/glut.html glutのダウンロード ６.http //shade-lounge.e-frontier.co.jp/modules/newbb/viewtopic.php?topic_id=799 forum=2 Microsoft VisualStudio2005 Professional Editionにてのビルド方法 １.sourceforgeからFTGLとfreetypeとcppunitをダウンロードし、それらを展開してProgram Filesにおく ダウンロードしたファイル名 ftgl-2.1.2.tar.gz ft235.zip cppunit-1.12.0.tar.gz ２.ツール-オプション-プロジェクトおよびソリューション-VC++ディレクトリ にて FreeTypeとFTGLおよびcppunitの インクルードディレクトリ および ライブラリディレクトリ を指定する ディレクトリを表示するプロジェクト：インクルードファイルの項目を以下のように設定する C \Program Files\cppunit-1.12.0\include C \Program Files\FTGL\include C \Program Files\freetype-2.3.5\include ディレクトリを表示するプロジェクト：ライブラリファイルの項目を以下のように設定する C \Program Files\cppunit-1.12.0\lib C \Program Files\FTGL\win32_vcpp\build C \Program Files\freetype-2.3.5\objs ３.C \Program Files\FTGL\win32_vcpp\のなかのftgl.dswを開く ４.freetype204MT_D.libの数字などを実際のものに書き換えてあげる。 ここでは,ftgl_static_libプロジェクト以外の以下のプロジェクトの プロパティ-構成プロパティ-リンカ-入力－追加の依存ファイルの の項目を以下のように修正する Debug ftgl_demo freetype235MT_D.lib ftgl_static_MT_d.lib ftgl_demo2 freetype235MT_D.lib ftgl_static_MT_d.lib ftgl_dll freetype235MT_D.lib unit_tests freetype235MT_D.lib ftgl_static_MT_d.lib cppunitd_dll.lib Debug DLL ftgl_demo freetype235_D.lib ftgl_dynamic_MT_d.lib ftgl_demo2 freetype235_D.lib ftgl_dynamic_MT_d.lib ftgl_dll freetype235_D.lib unit_tests freetype235MT_D.lib ftgl_static_MT_d.lib cppunitd_dll.lib Debug MT ftgl_demo freetype235_D.lib ftgl_dynamic_MT_d.lib ftgl_demo2 freetype235_D.lib ftgl_dynamic_MT_d.lib ftgl_dll freetype235_D.lib unit_tests freetype235MT_D.lib ftgl_static_MT_d.lib cppunitd_dll.lib ５.参考ＨＰ６のようにプロジェクトプロパティ-リンカ-入力-特定のライブラリを無視 MSVCRTD.lib を追加 ６.cppunit-1.12.0\examples\cppunittest\CppUnitTestMain.dsw をビルド ７.C \Program Files\freetype-2.3.5\builds\win32\visualc\freetype.sln をビルド glutの設定 １.参考ＨＰ５にてglut-3.7.6-bin.zipをダウンロードして展開すると以下のファイルが含まれている glut.h glut32.dll glut32.lib ２.C \Program Files\Microsoft Visual Studio 8\VC\PlatformSDK\Include\glのなかに glut.hをいれる ３.C \WINDOWS\system32 内にglut32.dllがなければ入れておく ４.C \Program Files\Microsoft Visual Studio 8\VC\PlatformSDK\Lib 内にglut32.libを同様に入れておく FTGL使用のためのVisualStudioの設定 １.プロジェクト－プロパティ－リンカ－入力－追加の依存ファイル に freetype235MT_D.lib ftgl_dynamic_MT_d.libを追加 ２.C \WINDOWS\system32 内に以下のDLLを追加 ftgl_dynamic_MT_d.dll ftgl_dynamic_MTD.dll ftgl_dynamic_MTD_d.dll